; Minnea-St 地区 30 年间 3 月份降水量数据记录，单位为英寸
(def precipitation 
  (list .77 1.74 .81 1.20 1.95 1.20 .47 1.43 3.37 2.20
        3.00 3.09 1.51 2.10 .52 1.62 1.31 .32 .59 .81
        2.81 1.87 1.18 1.35 4.75 2.48 .96 1.89 .90 2.05))

; 输出降水量样本
(format t "~%[Pricioitation data of April during past 30 years in Minnea-St region: ~d]~%" precipitation)

; 计算平均值
(format t "~%[Mean of precipitation: ~d]~%" (mean precipitation))

; 计算中位数
(format t "~%[Median of precipitation: ~d]~%" (median precipitation))

; 计算标准差
(format t "~%[Standard deviation: ~d]~%" (standard-deviation precipitation))

; 四分位距
(format t "~%[Interquartile range: ~d]~%" (interquartile-range precipitation))

(histogram precipitation)

(boxplot precipitation)